home *** CD-ROM | disk | FTP | other *** search
/ 600 Games / 600games.iso / Nave / Cosmic Defender.swf / scripts / frame_12 / DoAction.as
Encoding:
Text File  |  2006-06-13  |  8.9 KB  |  248 lines

  1. function hex_md5(s)
  2. {
  3.    return binl2hex(core_md5(str2binl(s),s.length * chrsz));
  4. }
  5. function b64_md5(s)
  6. {
  7.    return binl2b64(core_md5(str2binl(s),s.length * chrsz));
  8. }
  9. function str_md5(s)
  10. {
  11.    return binl2str(core_md5(str2binl(s),s.length * chrsz));
  12. }
  13. function hex_hmac_md5(key, data)
  14. {
  15.    return binl2hex(core_hmac_md5(key,data));
  16. }
  17. function b64_hmac_md5(key, data)
  18. {
  19.    return binl2b64(core_hmac_md5(key,data));
  20. }
  21. function str_hmac_md5(key, data)
  22. {
  23.    return binl2str(core_hmac_md5(key,data));
  24. }
  25. function md5_vm_test()
  26. {
  27.    return hex_md5("abc") == "900150983cd24fb0d6963f7d28e17f72";
  28. }
  29. function core_md5(x, len)
  30. {
  31.    x[len >> 5] |= 128 << len % 32;
  32.    x[(len + 64 >>> 9 << 4) + 14] = len;
  33.    var a = 1732584193;
  34.    var _loc3_ = -271733879;
  35.    var _loc2_ = -1732584194;
  36.    var _loc1_ = 271733878;
  37.    var i = 0;
  38.    while(i < x.length)
  39.    {
  40.       var olda = a;
  41.       var oldb = _loc3_;
  42.       var oldc = _loc2_;
  43.       var oldd = _loc1_;
  44.       a = md5_ff(a,_loc3_,_loc2_,_loc1_,x[i + 0],7,-680876936);
  45.       _loc1_ = md5_ff(_loc1_,a,_loc3_,_loc2_,x[i + 1],12,-389564586);
  46.       _loc2_ = md5_ff(_loc2_,_loc1_,a,_loc3_,x[i + 2],17,606105819);
  47.       _loc3_ = md5_ff(_loc3_,_loc2_,_loc1_,a,x[i + 3],22,-1044525330);
  48.       a = md5_ff(a,_loc3_,_loc2_,_loc1_,x[i + 4],7,-176418897);
  49.       _loc1_ = md5_ff(_loc1_,a,_loc3_,_loc2_,x[i + 5],12,1200080426);
  50.       _loc2_ = md5_ff(_loc2_,_loc1_,a,_loc3_,x[i + 6],17,-1473231341);
  51.       _loc3_ = md5_ff(_loc3_,_loc2_,_loc1_,a,x[i + 7],22,-45705983);
  52.       a = md5_ff(a,_loc3_,_loc2_,_loc1_,x[i + 8],7,1770035416);
  53.       _loc1_ = md5_ff(_loc1_,a,_loc3_,_loc2_,x[i + 9],12,-1958414417);
  54.       _loc2_ = md5_ff(_loc2_,_loc1_,a,_loc3_,x[i + 10],17,-42063);
  55.       _loc3_ = md5_ff(_loc3_,_loc2_,_loc1_,a,x[i + 11],22,-1990404162);
  56.       a = md5_ff(a,_loc3_,_loc2_,_loc1_,x[i + 12],7,1804603682);
  57.       _loc1_ = md5_ff(_loc1_,a,_loc3_,_loc2_,x[i + 13],12,-40341101);
  58.       _loc2_ = md5_ff(_loc2_,_loc1_,a,_loc3_,x[i + 14],17,-1502002290);
  59.       _loc3_ = md5_ff(_loc3_,_loc2_,_loc1_,a,x[i + 15],22,1236535329);
  60.       a = md5_gg(a,_loc3_,_loc2_,_loc1_,x[i + 1],5,-165796510);
  61.       _loc1_ = md5_gg(_loc1_,a,_loc3_,_loc2_,x[i + 6],9,-1069501632);
  62.       _loc2_ = md5_gg(_loc2_,_loc1_,a,_loc3_,x[i + 11],14,643717713);
  63.       _loc3_ = md5_gg(_loc3_,_loc2_,_loc1_,a,x[i + 0],20,-373897302);
  64.       a = md5_gg(a,_loc3_,_loc2_,_loc1_,x[i + 5],5,-701558691);
  65.       _loc1_ = md5_gg(_loc1_,a,_loc3_,_loc2_,x[i + 10],9,38016083);
  66.       _loc2_ = md5_gg(_loc2_,_loc1_,a,_loc3_,x[i + 15],14,-660478335);
  67.       _loc3_ = md5_gg(_loc3_,_loc2_,_loc1_,a,x[i + 4],20,-405537848);
  68.       a = md5_gg(a,_loc3_,_loc2_,_loc1_,x[i + 9],5,568446438);
  69.       _loc1_ = md5_gg(_loc1_,a,_loc3_,_loc2_,x[i + 14],9,-1019803690);
  70.       _loc2_ = md5_gg(_loc2_,_loc1_,a,_loc3_,x[i + 3],14,-187363961);
  71.       _loc3_ = md5_gg(_loc3_,_loc2_,_loc1_,a,x[i + 8],20,1163531501);
  72.       a = md5_gg(a,_loc3_,_loc2_,_loc1_,x[i + 13],5,-1444681467);
  73.       _loc1_ = md5_gg(_loc1_,a,_loc3_,_loc2_,x[i + 2],9,-51403784);
  74.       _loc2_ = md5_gg(_loc2_,_loc1_,a,_loc3_,x[i + 7],14,1735328473);
  75.       _loc3_ = md5_gg(_loc3_,_loc2_,_loc1_,a,x[i + 12],20,-1926607734);
  76.       a = md5_hh(a,_loc3_,_loc2_,_loc1_,x[i + 5],4,-378558);
  77.       _loc1_ = md5_hh(_loc1_,a,_loc3_,_loc2_,x[i + 8],11,-2022574463);
  78.       _loc2_ = md5_hh(_loc2_,_loc1_,a,_loc3_,x[i + 11],16,1839030562);
  79.       _loc3_ = md5_hh(_loc3_,_loc2_,_loc1_,a,x[i + 14],23,-35309556);
  80.       a = md5_hh(a,_loc3_,_loc2_,_loc1_,x[i + 1],4,-1530992060);
  81.       _loc1_ = md5_hh(_loc1_,a,_loc3_,_loc2_,x[i + 4],11,1272893353);
  82.       _loc2_ = md5_hh(_loc2_,_loc1_,a,_loc3_,x[i + 7],16,-155497632);
  83.       _loc3_ = md5_hh(_loc3_,_loc2_,_loc1_,a,x[i + 10],23,-1094730640);
  84.       a = md5_hh(a,_loc3_,_loc2_,_loc1_,x[i + 13],4,681279174);
  85.       _loc1_ = md5_hh(_loc1_,a,_loc3_,_loc2_,x[i + 0],11,-358537222);
  86.       _loc2_ = md5_hh(_loc2_,_loc1_,a,_loc3_,x[i + 3],16,-722521979);
  87.       _loc3_ = md5_hh(_loc3_,_loc2_,_loc1_,a,x[i + 6],23,76029189);
  88.       a = md5_hh(a,_loc3_,_loc2_,_loc1_,x[i + 9],4,-640364487);
  89.       _loc1_ = md5_hh(_loc1_,a,_loc3_,_loc2_,x[i + 12],11,-421815835);
  90.       _loc2_ = md5_hh(_loc2_,_loc1_,a,_loc3_,x[i + 15],16,530742520);
  91.       _loc3_ = md5_hh(_loc3_,_loc2_,_loc1_,a,x[i + 2],23,-995338651);
  92.       a = md5_ii(a,_loc3_,_loc2_,_loc1_,x[i + 0],6,-198630844);
  93.       _loc1_ = md5_ii(_loc1_,a,_loc3_,_loc2_,x[i + 7],10,1126891415);
  94.       _loc2_ = md5_ii(_loc2_,_loc1_,a,_loc3_,x[i + 14],15,-1416354905);
  95.       _loc3_ = md5_ii(_loc3_,_loc2_,_loc1_,a,x[i + 5],21,-57434055);
  96.       a = md5_ii(a,_loc3_,_loc2_,_loc1_,x[i + 12],6,1700485571);
  97.       _loc1_ = md5_ii(_loc1_,a,_loc3_,_loc2_,x[i + 3],10,-1894986606);
  98.       _loc2_ = md5_ii(_loc2_,_loc1_,a,_loc3_,x[i + 10],15,-1051523);
  99.       _loc3_ = md5_ii(_loc3_,_loc2_,_loc1_,a,x[i + 1],21,-2054922799);
  100.       a = md5_ii(a,_loc3_,_loc2_,_loc1_,x[i + 8],6,1873313359);
  101.       _loc1_ = md5_ii(_loc1_,a,_loc3_,_loc2_,x[i + 15],10,-30611744);
  102.       _loc2_ = md5_ii(_loc2_,_loc1_,a,_loc3_,x[i + 6],15,-1560198380);
  103.       _loc3_ = md5_ii(_loc3_,_loc2_,_loc1_,a,x[i + 13],21,1309151649);
  104.       a = md5_ii(a,_loc3_,_loc2_,_loc1_,x[i + 4],6,-145523070);
  105.       _loc1_ = md5_ii(_loc1_,a,_loc3_,_loc2_,x[i + 11],10,-1120210379);
  106.       _loc2_ = md5_ii(_loc2_,_loc1_,a,_loc3_,x[i + 2],15,718787259);
  107.       _loc3_ = md5_ii(_loc3_,_loc2_,_loc1_,a,x[i + 9],21,-343485551);
  108.       a = safe_add(a,olda);
  109.       _loc3_ = safe_add(_loc3_,oldb);
  110.       _loc2_ = safe_add(_loc2_,oldc);
  111.       _loc1_ = safe_add(_loc1_,oldd);
  112.       i += 16;
  113.    }
  114.    return Array(a,_loc3_,_loc2_,_loc1_);
  115. }
  116. function md5_cmn(q, a, b, x, s, t)
  117. {
  118.    return safe_add(bit_rol(safe_add(safe_add(a,q),safe_add(x,t)),s),b);
  119. }
  120. function md5_ff(a, b, c, d, x, s, t)
  121. {
  122.    var _loc1_ = b;
  123.    return md5_cmn(_loc1_ & c | (~_loc1_) & d,a,_loc1_,x,s,t);
  124. }
  125. function md5_gg(a, b, c, d, x, s, t)
  126. {
  127.    return md5_cmn(b & d | c & (~d),a,b,x,s,t);
  128. }
  129. function md5_hh(a, b, c, d, x, s, t)
  130. {
  131.    return md5_cmn(b ^ c ^ d,a,b,x,s,t);
  132. }
  133. function md5_ii(a, b, c, d, x, s, t)
  134. {
  135.    return md5_cmn(c ^ (b | ~d),a,b,x,s,t);
  136. }
  137. function core_hmac_md5(key, data)
  138. {
  139.    var _loc2_ = str2binl(key);
  140.    if(_loc2_.length > 16)
  141.    {
  142.       _loc2_ = core_md5(_loc2_,key.length * chrsz);
  143.    }
  144.    var _loc3_ = Array(16);
  145.    var opad = Array(16);
  146.    var _loc1_ = 0;
  147.    while(_loc1_ < 16)
  148.    {
  149.       _loc3_[_loc1_] = _loc2_[_loc1_] ^ 0x36363636;
  150.       opad[_loc1_] = _loc2_[_loc1_] ^ 0x5C5C5C5C;
  151.       _loc1_ = _loc1_ + 1;
  152.    }
  153.    var hash = core_md5(_loc3_.concat(str2binl(data)),512 + data.length * chrsz);
  154.    return core_md5(opad.concat(hash),640);
  155. }
  156. function safe_add(x, y)
  157. {
  158.    var _loc1_ = (x & 0xFFFF) + (y & 0xFFFF);
  159.    var _loc2_ = (x >> 16) + (y >> 16) + (_loc1_ >> 16);
  160.    return _loc2_ << 16 | _loc1_ & 0xFFFF;
  161. }
  162. function bit_rol(num, cnt)
  163. {
  164.    return num << cnt | num >>> 32 - cnt;
  165. }
  166. function str2binl(str)
  167. {
  168.    var _loc2_ = str;
  169.    var _loc3_ = Array();
  170.    var mask = (1 << chrsz) - 1;
  171.    var _loc1_ = 0;
  172.    while(_loc1_ < _loc2_.length * chrsz)
  173.    {
  174.       _loc3_[_loc1_ >> 5] |= (_loc2_.charCodeAt(_loc1_ / chrsz) & mask) << _loc1_ % 32;
  175.       _loc1_ += chrsz;
  176.    }
  177.    return _loc3_;
  178. }
  179. function binl2str(bin)
  180. {
  181.    var _loc2_ = bin;
  182.    var _loc3_ = "";
  183.    var mask = (1 << chrsz) - 1;
  184.    var _loc1_ = 0;
  185.    while(_loc1_ < _loc2_.length * 32)
  186.    {
  187.       _loc3_ += String.fromCharCode(_loc2_[_loc1_ >> 5] >>> _loc1_ % 32 & mask);
  188.       _loc1_ += chrsz;
  189.    }
  190.    return _loc3_;
  191. }
  192. function binl2hex(binarray)
  193. {
  194.    var _loc2_ = binarray;
  195.    var _loc3_ = !hexcase ? "0123456789abcdef" : "0123456789ABCDEF";
  196.    var str = "";
  197.    var _loc1_ = 0;
  198.    while(_loc1_ < _loc2_.length * 4)
  199.    {
  200.       str += _loc3_.charAt(_loc2_[_loc1_ >> 2] >> _loc1_ % 4 * 8 + 4 & 0x0F) + _loc3_.charAt(_loc2_[_loc1_ >> 2] >> _loc1_ % 4 * 8 & 0x0F);
  201.       _loc1_ = _loc1_ + 1;
  202.    }
  203.    return str;
  204. }
  205. function binl2b64(binarray)
  206. {
  207.    var _loc3_ = binarray;
  208.    var tab = "ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789+/";
  209.    var str = "";
  210.    var _loc2_ = 0;
  211.    while(_loc2_ < _loc3_.length * 4)
  212.    {
  213.       var triplet = (_loc3_[_loc2_ >> 2] >> 8 * (_loc2_ % 4) & 0xFF) << 16 | (_loc3_[_loc2_ + 1 >> 2] >> 8 * ((_loc2_ + 1) % 4) & 0xFF) << 8 | _loc3_[_loc2_ + 2 >> 2] >> 8 * ((_loc2_ + 2) % 4) & 0xFF;
  214.       var _loc1_ = 0;
  215.       while(_loc1_ < 4)
  216.       {
  217.          if(_loc2_ * 8 + _loc1_ * 6 > _loc3_.length * 32)
  218.          {
  219.             str += b64pad;
  220.          }
  221.          else
  222.          {
  223.             str += tab.charAt(triplet >> 6 * (3 - _loc1_) & 0x3F);
  224.          }
  225.          _loc1_ = _loc1_ + 1;
  226.       }
  227.       _loc2_ += 3;
  228.    }
  229.    return str;
  230. }
  231. _root.score = 0;
  232. if(!_root.track_play && _root.sound_on)
  233. {
  234.    _root.track_play = true;
  235.    _root.splash_music.start(0,99999);
  236. }
  237. stop();
  238. var hexcase = 0;
  239. var b64pad = "";
  240. var chrsz = 8;
  241. first_play = SharedObject.getLocal("cosmic_defender");
  242. if(first_play.data.played != "true")
  243. {
  244.    first_play.data.played = "true";
  245.    first_play.flush();
  246.    _root.gotoAndPlay("instructions");
  247. }
  248.